home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software Vault: The Gold Collection
/
Software Vault - The Gold Collection (American Databankers) (1993).ISO
/
cdr28
/
doc_proc.zip
/
SAMP-DOC.ZIP
/
TAPEDUMP.DOC
< prev
next >
Wrap
Text File
|
1992-11-16
|
6KB
|
103 lines
*************************************
* *
* T A P E D U M P *
* ON THE MVS/XA OPERATING SYSTEM *
* *
*************************************
John S. Ward
03/15/93
EJECT
There are now procedures for producing listings of tape files in
both character and hex format. These procedures allow you to determine
the logical record length (lrecl), format and block size of a non-labeled
foreign or library tape. There is a CLIST called from TSO and a PROC
called from JCL.
TAPEDUMP CLIST:
From TSO: TAPEDUMP DSN(DATA.SET.NAME) VOLSER(vvvvvv)
The DSN and VOLSER parameters are required. There are
additional parameters which you may supply or take the defaults.
FSQN(1) - File sequence number, defaults to 1.
LBL(NL) - Label type, defaults to non-labeled.
EXPDT(98000) - Expiration Date/TMS, defaults to foreign tape.
COUNT(10) - Count, the number of blocks to dump.
This CLIST submits a batch job whose output may be viewed in
ISPF panel 3.8 and requeued for printing.
TAPEDUMP PROC:
From JCL: //STEP1 EXEC VOLUP,VOLSER=vvvvvv,ACCESS=READ
//STEP2 EXEC TAPEDUMP,DSN='DATA.SET.NAME',VOLSER=vvvvvv
//TDUMP.SYSIN DD *
PRINT INFILE(TAPEDD) COUNT(n)
/*
The DSN, VOLSER, and COUNT parameters must be supplied. The
COUNT parameter indicates the number of blocks to dump. Please
note the space in front of PRINT, it must be included. As in the
CLIST, there are additional parameters which may be supplied or
the default taken.
FSQN=1 - File sequence number, defaults to 1.
LBL=NL - Label type, defaults to non-labeled.
EXPDT=98000 - Expiration Date/TMS, defaults to foreign tape.
If the DSN of a foreign tape is one that is illegal under MVS, it
must be enclosed in triple quotes:
DSN='''BAD.DSN.1'''